<BR>
<TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0>
<CFOUTPUT>
<TR>
   <TD NOWRAP><FONT color=Maroon style=font:21px Arial>Infocards:</FONT></TD>
</TR>
</CFOUTPUT>
<TR>
	<TD>

		<TABLE BORDER=1 CELLSPACING=1 CELLPADDING=2 WIDTH="100%">
			<CFLOOP QUERY="GetFormDetails">
				<CFQUERY NAME="GetDetailFields" DATASOURCE=#client.global_dsn#>
					SELECT *
					FROM GRGBOSETABLEFIELDS
					WHERE
						(TABLENAME  = '#GetFormDetails.DETAILTABLE#') AND
						(ISVISIBLEEFORM    = 'Y' OR ISVISIBLEEFORM IS NULL) AND
						(COLUMNNAME <> 'PERSONNELIDNO') AND
						(COLUMNNAME <> 'RECDATECREATED') AND
						(COLUMNNAME <> 'RECCREATEDBY') AND
						(COLUMNNAME <> 'USERID') AND
						(COLUMNNAME <> 'DATELASTUPDATE') AND
						(COLUMNNAME <> 'TIMELASTUPDATE') AND
						(COLUMNNAME <> 'ROUTEID') AND
						(COLUMNNAME <> 'APPROVED') AND
						(#sqlSTRLEN#(COLUMNDESC) > 0)
					ORDER BY FIELDGROUP, COLUMNORDER, COLUMNDESC, COLUMNNAME
				</CFQUERY>

				<CFOUTPUT>
					<TR><TD COLSPAN="#GetDetailFields.RecordCount#" CLASS="bold">&nbsp;#GetFormDetails.DESCRIPTION#</TD></TR>
				</CFOUTPUT>

				<CFQUERY NAME="GetLevelID" DATASOURCE="#client.global_dsn#">
					SELECT LEVELID
					FROM GRGBOSETABLE
					WHERE
						(TABLENAME = '#GetFormDetails.DETAILTABLE#')
				</CFQUERY>
				<!--- custom tag: parameter: DBLEVEL; return value: DSN --->
				<CFMODULE TEMPLATE="#client.common_path#cfm_leveldsn.cfm" DBLEVEL="#GetLevelID.LEVELID#">

				<CFQUERY NAME="GetDetailRec" DATASOURCE=#table_dsn#>
					SELECT * FROM #GetFormDetails.DETAILTABLE#
					<CFSET theVal = Evaluate("GetEntry." & GetFormDetails.DTL_FIELD1)>
					WHERE #GetFormDetails.DTL_FIELD1# = '#theVal#'
				</CFQUERY>

				<CFOUTPUT>
					<TR>
						<CFLOOP QUERY="GetDetailFields">
							<TD align="center" CLASS="bold">&nbsp;#GetDetailFields.COLUMNDESC#&nbsp;</td>
						</CFLOOP>
					</TR>

					<CFSET sCtr = 1>

					<CFLOOP QUERY="GetDetailRec">
							<TR>
								<CFLOOP QUERY="GetDetailFields">
									<TD>&nbsp;#Evaluate("GetDetailRec." & GetDetailFields.COLUMNNAME & "[sctr]")#&nbsp;</TD>
								</CFLOOP>
							</TR>

						<CFSET sctr = sctr + 1>
					</CFLOOP>
			   </CFOUTPUT>
			</CFLOOP>
		</TABLE>
	</TD>
</TR>
</TABLE>
